A=-24576;B=-22773;for N=Ato B;%(N)=KP;next N;%(20050)=B;:return ;NT=0;run 
{1}null .
{2}null .
{3}null .
{4}null .MATCH MY NUMBER
{6}null .JIM DUNSON 12/78
{7}null .WORK MODEL
{8}null .W/BUGS
{9}null .
{10}null clear ;NT=0;CY=0;print " HOW MANY PLAYERS? (1-3)
{20}null X=KP;clear ;BC=127;FC=88;box 0,0,160,88,1;box 0,0,156,84,2;CY=37;CX=-44;print "MATCH MY NUMBER";box 0,32,160,1,1
{30}null CY=27;CX=-62;print "SCORE:";box 0,22,160,1,1;CY=11;CX=-48;print "TRY LESS THAN";CY=2;CX=-48;print "TRY MORE THAN"
(null CY=-13;CX=-62;print "#1.";CY=-21;CX=-62;print "#2.";CY=-29;CX=-62;print "#3.";D=0;E=0;F=0;T=0
2null M=0;V=0;L=100;R=rnd (99)
<null CY=27;CX=-20;print #1,"  1:",D,"  2:",E,"  3:",F;CY=11;CX=38;print #1,L;CY=2;CX=38;print #1,M;gosub 460;gosub 490;input ""A
Fnull if X=49goto 110
Pnull gosub 470;gosub 490;input ""B
Znull if X=50goto 110
a null gosub 480;gosub 490;input ""C
goto null gosub 460;gosub 500;gosub 470;gosub 500;gosub 480;gosub 500
{120}null if R=A D=D+1;gosub 460;gosub 510
{-126}null if R=B E=E+1;gosub 470;gosub 510
{-116}null if R=C F=F+1;gosub 480;gosub 510
{-106}null if V>0for Z=1to 1000;next Z
{-96}null gosub 460;gosub 500;gosub 470;gosub 500;gosub 480;gosub 500
{-86}null G=A>B ;H=A<B ;I=A>C ;J=A<C ;K=A>R ;N=A<R ;O=B>C ;P=B<C ;Q=B>R ;S=B<R ;U=C>R ;W=C<R
{-76}null if X=50goto 230
{-66}null if X=51goto 300
{-56}null if K L=A
{-46}null if N M=A
{-36}null goto 380
{-26}null if K if Q if G L=B
{-16}null if K if Q if H L=A
{-6}null if K if S L=A ;M=B
{4}{1}if N if Q L=B ;M=A
{14}{1}if N if S if G M=A
{24}{1}if N if S if H M=B
"{1}goto 380
,{1}if K if Q if U gosub 530
6{1}if K if Q if W gosub 600
@{1}if K if S if U gosub 640
J{1}if N if Q if U gosub 680
T{1}if N if S if W gosub 720
up {1}if N if S if U gosub 790
list {1}if N if Q if W gosub 830
for {1}if K if S if W gosub 870
{124}{1}if D>9gosub 460;gosub 520
{-122}{1}if E>9gosub 470;gosub 520
{-112}{1}if F>9gosub 480;gosub 520
{-102}{1}if T>0goto 440
{-92}{1}if V>0goto 50
{-82}{1}goto 60
{-72}{1}for Z=1to 2000;next Z
{-62}{1}goto 10
{-52}{1}CY=-12;CX=-38;return 
{-42}{1}CY=-21;CX=-38;return 
{-32}{1}CY=-29;CX=-38;return 
{-22}{1}print " YOUR  TURN!",;return 
{-12}{1}print "                 ";return 
{-2}{1}print "MATCHED MY NUMBER!";V=V+1;return 
{8}{2}print "IS  A  WINNER!!!!!";T=T+1;return 
{18}{2}if H if J L=A
{28}{2}if G if P L=B
&{2}if I if O L=C
0{2}if H if B=C L={2}if P if A=C L=B
D{2}if I if A=B L=C
N{2}return 
X{2}if H L=A ;M=C
mul {2}if G L=B ;M=C
line {2}if A=B L=A ;M=C
rnd {2}return 
{-128}{2}if J L=A ;M=B
{-118}{2}if I L=C ;M=B
{-108}{2}if A=C L=A ;M=B
{-98}{2}return 
{-88}{2}if P L=B ;M=A
{-78}{2}if O L=C ;M=A
{-68}{2}if B=C L=B ;M=A
{-58}{2}return 
{-48}{2}if G if I M=A
{-38}{2}if H if O M=B
{-28}{2}if J if P M=C
{-18}{2}if G if B=C M=A
{-8}{2}if O if A=C M=B
{2}{3}if J if A=B M=C
{12}{3}return 
{22}{3}if G M=A ;L=C
 {3}if H M=B ;L=C
*{3}if A=C M=A ;L=C
4{3}return 
>{3}if I M=A ;L=B
H{3}if J M=C ;L=B
R{3}if A=C M=A ;L=B
\{3}return 
c {3}if O M=B ;L=A
return {3}if P M=C;L=A
{122}{3}if B=C M=B ;L=A
{-124}{3}return 
null {-1}null null null 